﻿Public Class ClienteEntrega

    Dim _CE_CIA, _CE_CODIGO, _CE_CLIENTE, _CE_DIRECCION, _CE_REFERENCIA, _CE_CONTACTO As String
    Dim _CE_DISTRITO, _CE_LATITUD, _CE_LONGITUD, _CE_TIPO, _CE_ACTIVO As String

    Sub New()

    End Sub

    Sub New(cia As String, codigo As String, cliente As String, direccion As String, referencia As String, contacto As String,
            distrito As String, latitud As String, longitud As String, tipo As String, activo As String)
        Me._CE_CIA = cia
        Me._CE_CODIGO = codigo
        Me._CE_CLIENTE = cliente
        Me._CE_DIRECCION = direccion
        Me._CE_REFERENCIA = referencia
        Me._CE_CONTACTO = contacto
        Me._CE_DISTRITO = distrito
        Me._CE_LATITUD = latitud
        Me._CE_LONGITUD = longitud
        Me._CE_TIPO = tipo
        Me._CE_ACTIVO = activo
    End Sub

    Public Property CIA() As String
        Get
            Return _CE_CIA
        End Get
        Set(value As String)
            _CE_CIA = value
        End Set
    End Property

    Public Property CLEN_Codigo() As String
        Get
            Return _CE_CODIGO
        End Get
        Set(value As String)
            _CE_CODIGO = value
        End Set
    End Property

    Public Property CLI_Codigo() As String
        Get
            Return _CE_CLIENTE
        End Get
        Set(value As String)
            _CE_CLIENTE = value
        End Set
    End Property

    Public Property CLEN_Direccion() As String
        Get
            Return _CE_DIRECCION
        End Get
        Set(value As String)
            _CE_DIRECCION = value
        End Set
    End Property

    Public Property CLEN_Referencia() As String
        Get
            Return _CE_REFERENCIA
        End Get
        Set(value As String)
            _CE_REFERENCIA = value
        End Set
    End Property

    Public Property CLEN_Contacto() As String
        Get
            Return _CE_CONTACTO
        End Get
        Set(value As String)
            _CE_CONTACTO = value
        End Set
    End Property

    Public Property DIS_Codigo() As String
        Get
            Return _CE_DISTRITO
        End Get
        Set(value As String)
            _CE_DISTRITO = value
        End Set
    End Property

    Public Property CLEN_Latitud() As String
        Get
            Return _CE_LATITUD
        End Get
        Set(value As String)
            _CE_LATITUD = value
        End Set
    End Property

    Public Property CLEN_Longitud() As String
        Get
            Return _CE_LONGITUD
        End Get
        Set(value As String)
            _CE_LONGITUD = value
        End Set
    End Property

    Public Property TEN_Codigo() As String
        Get
            Return _CE_TIPO
        End Get
        Set(value As String)
            _CE_TIPO = value
        End Set
    End Property

    Public Property CLEN_Activo() As String
        Get
            Return _CE_ACTIVO
        End Get
        Set(value As String)
            _CE_ACTIVO = value
        End Set
    End Property

End Class
